home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 46 / Amiga Format CD46 (1999-10-20)(Future Publishing)(GB)[!][issue 1999-12].iso / -serious- / misc / minimen / dmsx next >
Text File  |  1999-09-06  |  450b  |  21 lines
  1. echo c
  2. Requestfile >env:FDMS TITLE="Choose DMS file to extract"
  3. if warn
  4.    echo "*N Operation canceled....!"
  5. endif
  6. MiniMen drives
  7. if exists env:minmen
  8.    assign >nil: exists $MinMen:
  9.    if warn
  10.       mount >nil: sys:storage/dosdrivers/$MinMen
  11.    endif
  12.    if $MinMen EQ "PC0"
  13.       undms $FDMS to $MinMen: PC VERIFY
  14.    ELSE
  15.       undms $FDMS to $MinMen: VERIFY
  16.    ENDIF
  17. else
  18.    echo "*N Operation canceled...!"
  19. endif
  20. delete >nil: env:MinMen env:FDMS
  21.